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■ComputeiTlardware_ 

Una cartuccia C64 senza EPROM 


Con questa speciale tecnica, non avre¬ 
te bisogno di nessun costoso dispositi¬ 
vo di programmazione per preparare 
le vostre cartucce per C64 o C128. 

Le cartucce sono utili e facili da usare. 1 
programmi su cartuccia si caricano i- 
stantaneamente. Potrete costruire una 
cartuccia utilizzando EPROM (memo¬ 
rie di sola lettura cancellabili e program¬ 
mabili) per circa 30.000 lire, se siete o- 
culati nell'acquisto. Ma le EPROM de¬ 
vono essere programmate o "bruciate" 
usando un apposito programmatore, che 
costa circa 175.000 lire. Se fate qualche 
errore o volete modificare i programmi, 
avrete bisogno di un cancellatore di E- 
PROM, altre 60.000 lire. L'economica 
cartuccia EPROM costa quindi poco 
meno di 300.000 lire di spese d'impian¬ 
to. 

Un’alternativa consiste nell'utilizzare la 
RAM (memoria ad accesso casuale) in 
luogo delle EPROM. La RAM può esse¬ 
re programmata dallo stesso computer e 
le informazioni contenute possono esse¬ 
re modificate in ogni istante, senza spe¬ 
ciali apparecchiature supplementari. 

Il problema con la RAM è che tutto 
quanto vi è stato memorizzato scompa¬ 
re quando si interrompe l’alimentazio¬ 
ne: non è esattamente ciò che ci si atten¬ 
de da una cartuccia. Utilizzando però le 
speciali RAM CMOS (semiconduttori 
complementari ad ossido metallico), 
che assorbono una limitatissima corren¬ 
te di riposo, potremo usare una piccola 
batteria per conservare intatte le infor¬ 
mazioni contenute nella RAM. La me¬ 
moria viene conservata anche quando il 
computer è spento e la cartuccia estrat¬ 
ta. La 4464-15s, costruita dalla NEC 
Corp. ed utilizzata in questo progetto, 


assorbe normalmente una corrente di ri¬ 
poso di 0,1 pA: una batteria con le di¬ 
mensioni di una moneta da 500 lire può 
alimentarla per parecchi anni. 


Figura 1. 

Tutti i riferimenti tra parentesi sono nu¬ 
meri di piedini per la porta di espansione 
del C64: vedere sulla guida di riferimento 
per i programmatori del C64. 


Costruzione della cartuccia RAM 

Per il nostro prototipo, abbiamo usato u- 
na scheda "preforata" Vector 3791-5, 
sulla quale ci sono 44 
piste già incise (22 su 
ciascuna faccia), con la 
giusta spaziatura per al¬ 
linearsi con la presa di 
espansione del C64. Se 
possedete l’attrezzatura 
per incidere i circuiti 
stampati, questa potreb¬ 
be essere la scelta più e- 
conomica. Potreste an¬ 
che adattare la scheda di 
una vecchia cartuccia, 
oppure acquistarne una 
prevista per essere usata 
nel C64. Accertatevi 
che sulla scheda utiliz¬ 
zata siano disponibili le 
linee di indirizzamento 
A13-A15 (piedini F, H 
e J): non sono necessa¬ 
rie per le cartucce E- 
PROM e possono esse¬ 
re assenti sulle schede 
progettate per questo 
scopo. 

Per montare il nostro 
circuito, abbiamo usato 
il "wire wrap", ma qua¬ 
lunque sistema di ca¬ 
blaggio andrà bene. Per 
i circuiti integrati sono 
consigliati, ma non in¬ 
dispensabili, gli zocco¬ 
li. Attenersi alle consuete precauzioni 
quando si lavora con le RAM CMOS, 
perché un maneggio improprio potreb¬ 
be danneggiarle irreparabilmente. 

La Figura 1 mostra lo schema di una car- 
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Figura 2. Parti supplementari necessarie per una cartuccia da 16 K. 


tuccia RAM da 8 K. La Figura 2 mostra 
i circuiti necessari per aggiungere altri 8 
K. L'interruttore S1 controlla l'alimen¬ 
tazione delle RAM CMOS. Se l'interrut¬ 
tore è chiuso, arriva l'alimentazione dal 
C64. 

Con S1 aperto od il computer spento, en¬ 
tra in funzione la batteria, che conserva 
i dati nella memoria. S2 controlla la let¬ 
tura/scrittura dei dati nelle RAM. Con 
questo interruttore chiuso, il computer 
può modificare i dati. L'apertura di S2 fa 
apparire la RAM al C64 come se fosse u- 
na ROM. 

S3 ed S4 permettono alla cartuccia 
RAM di emulare i tre tipi di cartuccia u- 
sati con il C64, come vedremo tra poco. 
S5 è utilizzato soltanto con la versione 
da 16 K: permette di "spostare" gli 8 K 
superiori della RAM verso una zona do¬ 
ve possano essere programmati. I diodi 
eliminano elettricamente la batteria dal 
circuito quando il computer fa arrivare 
l'alimentazione, evitando che le pile ten¬ 
tino da sole di alimentare l'intero C64.1 
diversi resistori stabiliscono i valori di 
base per le linee di segnale e commuta¬ 
no le RAM nella condizione di corrente 
di riposo quando viene aperto SI. 

Il 74LS42 è un decodificatore che con¬ 
trolla lo stato delle tre linee con indiriz¬ 
zo più elevato (A 13-A15) e produce una 
diversa uscita per ciascuna combinazio¬ 
ne di questi indirizzi. 

Ci sono 8 uscite e pertanto possiamo 
scegliere con questo chip 8 banchi di 
memoria da 8 K. 

1 condensatori CI e C2 vengono utiliz¬ 
zati per eliminare qualsiasi disturbo dal¬ 
la linea di alimentazione. CI deve esse¬ 
re montato vicino al bordo della scheda 
che si inserisce nel computer e C2 più vi¬ 
cino possibile al 74LS42. 

Potrete trovare altre RAM da 8 x 8 K con 
analoghe caratteristiche di assorbimen¬ 
to a riposo. 

Se hanno un tempo di accesso di 150 ns 
o meno, vanno bene per questa applica¬ 
zione. Richiedere sempre i relativi fogli 
dati: le piedinature potrebbero essere di¬ 
verse da quelle indicate nei nostri sche¬ 
mi. 


Come funziona la cartuccia 

Il C64 utilizza un PLA (array logico pro¬ 
grammato) per controllare l'accesso di 
RAM, ROM e cartucce ai bus degli indi¬ 
rizzi e dei dati. Le cartucce possono ave¬ 
re tre configurazioni ed il PLA identifi¬ 
ca il tipo di cartuccia mediante due linee 
di controllo, chiamate "GAME" (piedi¬ 
no 8) ed "XROM" (piedino 9). La car¬ 
tuccia RAM utilizza gli interruttori S3 
ed S4 per attivare le linee di controllo. 
Una cartuccia da 8 K appare sempre nel 
campo di indirizzamento che va da 
$8000 a $9FFF. Dispone anche di un 
ponticello interno, che manda a livello 
basso la linea XROM. La chiusura di S4 
simula questa configurazione. Una car¬ 
tuccia da 16 K ha ancora 8 K tra $8000 
e $9FFF. Gli 8 K superiori possono ri¬ 
siedere in una tra due altre aree. Se è bas¬ 
sa solo la linea GAME (S3 chiuso, S4 a- 
perto), gli 8 K superiori vengono dispo¬ 
sti tra $E000 e $FFFF. Se sono a livello 
basso sia GAME che XROM (S3 ed S4 


chiusi), tutti i 16 K 
saranno contigui, 
tra$8000e$BFFF. 
Una cartuccia da 8 
K contiene normal¬ 
mente un program¬ 
ma autonomo, op¬ 
pure uno che utiliz¬ 
za il BASIC e le 
routine ROM Ker- 
nal incorporati nel 
C64. Una cartuccia 
da 16 K nel campo 
di indirizzamento 
tra $8000 e $BFFF 
sostituisce la ROM 
BASIC. Gli 8 K su¬ 
periori possono 
contenere un BA¬ 
SIC modificato e 
quelli inferiori le e- 
stensioni BASIC. 
La terza configura¬ 
zione è stata conce¬ 
pita esclusivamen¬ 
te per i giochi. In 
questo modo, il 
chip VIC terrà conto del set di caratteri 
nella parte superiore della memoria, da 
$E000 a $FFFF. Questo semplifica la 
grafica a bassa risoluzione per i giochi, 
ma è inadatto come sostituto del Kemal. 
I programmi di queste cartucce devono 
perciò essere del tutto autonomi. 

Tutti i chip di memoria, RAM o ROM, 
sono commutati sui bus dei dati e degli 
indirizzi mediante le linee "chip select". 
Nel C64, è il PLA a controllare queste li¬ 
nee e pertanto decide la scelta tra la 
RAM, una delle ROM del sistema, op¬ 
pure la cartuccia. Se il PLA rileva che è 
stata inserita una cartuccia (tramite le li¬ 
nee GAME ed XROM) ed il micropro¬ 
cessore emette un comando "READ", 
allora viene scelta la zona di memoria 
della cartuccia. Il PLA controlla questa 
selezione, tramite le linee "ROML" 
(piedino 11) e "ROMH" (piedino B). Se 
viene emesso un comando "WRITE", il 
PLA esclude la memoria della cartuccia 
e porta invece a quegli indirizzi la RAM. 
Nessuna cartuccia Commodore contie- 
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SI 

S2 

S3 

S4 

S5 

Lettura dalla cartuccia: 






Cartuccia da 8 R 

ON 

OFF 

OFF 

ON 

X 

Cartuccia da 16 R, 8 K superiori in $A3000 

ON 

OFF 

ON 

ON 

ROMH 

Cartuccia da 16 R, 8 R superiori in SAE000 

ON 

OFF 

ON 

OFF 

ROMH 

Scrittura nella cartuccia: 






Cartuccia da 8 R 

ON 

ON 

OFF 

OFF 

X 

Cartuccia da 16 R 

ON 

ON 

OFF 

OFF 

$6000 


Figura 3. Settaggio dei commutatori per usare la cartuccia. 


ne RAM, pertanto il PLA non scriverà 
nella nostra cartuccia RAM. Per ottene¬ 
re questo risultato, si bypassa il PLA e si 
effettua la propria decodifica. Qualcosa 
viene eseguito automaticamente dal 
chip 74LS42 e qualcosa dovremo con¬ 
trollarlo manualmente, con il commuta¬ 
tore S5. 

Programmazione della cartuccia 
RAM 

Quando il C64 è acceso, effettuare il re¬ 
set con l'interruttore esterno; oppure 
premendo il tasto "RESTORE". Le rou¬ 
tine nella ROM Remai cercano una car¬ 
tuccia. Tutte le cartucce avranno 8 K, a 
partire dalla locazione $ 8000. Il Remai 
cerca il codice "CBM80", iniziando al¬ 
l’indirizzo $ 8004. Il bit alto di ciascuna 
lettera deve esser settato. Se il codice e- 
siste, verranno saltate le normali routine 
di inizializzazione ed il controllo viene 
trasferito al programma della cartuccia. 
Al reset all'accensione o via hardware, 
l'indirizzo memorizzato nell’ordine bas¬ 
so-alto in $ 8000/$8001 viene utilizzato 
per un salto indiretto. Se è stato premu¬ 
to "RESTORE", viene usato invece l'in¬ 
dirizzo memorizzato in $8002/$8003. 
Per creare nella cartuccia un programma 
di auto-avviamento, dovrete installare 
la frase di codice ed i giusti indirizzi. 
Potrete anche trovarvi nella necessità di 
richiamare qualcuna delle routine di ini¬ 
zializzazione saltate. Potrete memoriz¬ 
zare codici macchina nella cartuccia 
RAM senza frase di auto-start e SYS al 
codice, dal BASIC od in modo diretto, 
invece di effettuare l'auto-start. Se vole¬ 
te utilizzare la cartuccia RAM per me¬ 
morizzare uno dei vostri programmi 
BASIC, ricorrete al listato 1. Un RUN di 
questo programma crea un file chiama¬ 
to "RAMCART" sul dispositivo 8, de¬ 
stinato al disco. Potrete modificare que¬ 
sti default nella riga 100 del programma. 
Il codice sorgente del file è mostrato, in 
formato PAL, nel listato 2. 

Per usare il programma installare la car¬ 
tuccia RAM, chiudendo poi S1 ed S2. 
Accertarsi che S3 ed S4 siano entrambi 


aperti e poi accendere il computer. La 
cartuccia RAM è ora "in parallelo" alla 
RAM di sistema. Le due RAM vengono 
analizzate insieme dal C 64 e gli stessi 
dati vengono scritti, in entrambe, negli 
indirizzi corrispondenti. Questo passo è 
importante: se le due RAM contenesse¬ 
ro dati diversi, entrerebbero in conflitto 
sul bus dei dati. Caricare (con LOAD) il 
programma "RAMCART" con ",8,1". 
In questo modo il codice viene piazzato 
all'inizio della memoria della cartuccia 
RAM. Caricate ora (LOAD) il program¬ 
ma BASIC che volete memorizzare ma 
non date RUN. 

Battete invece: SYS 32882 
Il codice macchina memorizzato da 
"RAMCART" copierà il programma 
BASIC nella RAM della cartuccia. Se il 
programma fosse troppo lungo, mag¬ 
giore di 31 blocchi del disco, apparirà un 
messaggio di errore. Quando appare la 
richiesta "READY", aprire S2. In que¬ 
sto modo si stacca la cartuccia dalla li¬ 
nea READ/WRITE ed allora i dati non 
potranno più essere modificati dal com¬ 
puter. Spegnere il C 64: la batteria con¬ 
serverà il programma nella RAM della 
cartuccia. Chiudere S4 per informare il 
PLA che si tratta di una cartuccia da 8 R 
e riaccendere il computer. Il codice di 
auto-start nella cartuccia RAM farà ini- 
zializzare normalmente il BASIC del si¬ 
stema. Ricopierà poi il vostro program¬ 
ma nell'area della memoria BASIC. Il 
comando "RUN" verrà inserito nel buf¬ 
fer della tastiera ed il computer lo ese¬ 


guirà, facendo partire il vostro program¬ 
ma. La combinazione RUN-STOP/RE- 
STORE vi porterà fuori dal vostro pro¬ 
gramma BASIC, visualizzando il mes¬ 
saggio "READY". Per riavviare il pro¬ 
gramma nella cartuccia usare un inter¬ 
ruttore di reset hardware oppure impo¬ 
stare: SYS 64738 Per programmare gli 8 
R superiori di RAM in una cartuccia da 
16 R, è necessaria una tecnica diversa. 
Dovremo usare la linea ROMH prove¬ 
niente dal PLA per selezionare la me¬ 
moria della cartuccia, perché altrimenti 
il PLA inserirebbe la ROM di sistema. 
Però il PLA non ci lascerà scrivere dati 
nella memoria selezionata da ROMH. 
S5 commuta la linea di selezione degli 8 
R di RAM superiori tra l'uscita ROMH 
del PLA e l'uscita $6000-$7FFF prove¬ 
niente dal 74LS42. Con S5 in posizione 
$6000 potrete modificare gli 8 R supe¬ 
riori di dati scrivendo nella RAM in que¬ 
sta locazione inferiore. Riportando S5 in 
posizione ROMH si farà commutare il 
PLA della RAM a $A000 oppure $E000 
a seconda delle posizioni di S3 ed S4. 
Ad esempio, per cambiare il BASIC, in¬ 
serire una cartuccia RAM da 16 R nel 
computer, chiudere S1 ed S2, aprire S3 
ed S4 e portare S5 nella posizione 
$6000. Accendere il computer, fare il 
LOAD di un monitor in linguaggio mac¬ 
china, che risieda al di sotto di $6000 o 
al di sopra di $C000 ed usarlo per copia¬ 
re la ROM BASIC nella RAM in $6000. 
Usare il modo di verifica della memoria 
per guardare cosa c'è nei 9 byte che ini- 
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ziano da $6378. Si tratta del testo "REA¬ 
DY", seguito da un "RETURN" ($0D), 
da un'interlinea ($0A) e da un byte zero 
di terminazione ($00).Usare il monitor 
per modificare il testo. Aprire ora S2 per 
bloccare le modifiche nella RAM e spe¬ 
gnere il computer. Spostare S5 nella po¬ 
sizione ROMH. Chiudere S3 ed S4. Si 
ordina in questo modo al PLA di dispor¬ 
re gli 8 K di RAM con il BASIC modi¬ 
ficato nell'area di indirizzamento nor¬ 
malmente utilizzata dalla ROM BASIC. 
Accendendo ora il computer, si vedrà il 
prompt READY modificato e soltanto 
30.719 byte liberi, perché anche gli 8 K 
inferiori della cartuccia RAM vengono 
inseriti dal PLA. Potrete utilizzare gli 8 
K inferiori per inserirvi programmi BA¬ 
SIC oppure estensioni, oltre a qualsiasi 
modifica da voi apportata al sistema o- 
perativo BASIC. I posizionamenti dei 


B1 

batteria da 3 V 
(vedi testo) 

Cl-2 

cond. ceramici a disco 

da 50 nF 12 VI 

Dl/4 

diodi 1N4148 

Rl-3/5-7 

resistori da 2,2 k£2 

R2-6 

resistori da 22 kQ 

Sl/4 

gruppo di interruttori 
DIL 

S5 

deviatore unipolare 
miniatura 

1 

74LS42 decodificatore 
BCD 1 da 10 

1 

4464 RAM statica 

CMOS 


commutatori per la programmazione e 
l'utilizzo della cartuccia sono riassunti 
in Figura 3. La cartuccia RAM è del tut¬ 
to compatibile con le schede di espan¬ 
sione, che permettono finserimento 
contemporaneo di diverse cartucce. Ac¬ 
certatevi di aprire S1 quando seleziona¬ 


te una diversa cartuccia, in modo che la 
RAM in $8000 venga rimossa dai BUS. 
Potete usare la cartuccia RAM anche su 
un CI28. Nel modo C128, non vengono 
usate le linee GAME ed XROM: la 
MMU (unità di gestione della memoria) 
cerca invece un codice diverso. Dovre¬ 
te scrivere una routine auto-boot per 
CI28, per poi installarla con la stessa 
procedura descritta in precedenza per il 
C64. Questa cartuccia RAM sarà certo 
per voi un'alternativa poco costosa al¬ 
l'acquisto di un programmatore e can- 
cellatore di EPROM per produrre le vo¬ 
stre cartucce. Anche se possedete già un 
programmatore di EPROM, la facilità e 
la rapidità di modifica al software conte¬ 
nuto nella cartuccia RAM rappresente¬ 
ranno senz'altro un vantaggio. 

©Transactor. Diritti riservati. 
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Listato 1 

1000 rem save"0:ramcart.ldr" ,8 

1010 rem ** by: john bush and noel nyman - seattle, wa 

1020 rem ** auto-start support prg 

1030 rem ** for c64 ram cartridge 

1040: 

1050 rem ** this program will create 
1060 rem * * a load ",8,1" module on 
1070 rem ** diskcalled 'ramcart' 

1080: 

1090 open 15,8,15: open 8,8,1," 0:ramcart" 

1100 input#15,e,e$,b,c: if e then dose 15: print e;e$;b;c: 
stop 

1110 for j = 32768 to 32999: read x: print#8,chr$(x);: 
eh = eh + x: next: close8 

1120 if ch<>28345 then print " checksum errori " : stop 
1130 print ' * * module created * * ’ : end 
1140 : 

1150 data 0,128, 9,128, 94,254,195,194 

1160 data 205, 56, 48,162, 5,142, 22,208 

1170data 32,163,253, 32, 80,253, 32, 21 
1180 data 253, 32, 91,255, 88, 32, 83,228 
1190 data 32,191,227, 162, 251,154, 172,224 
1200 data 128, 174, 225, 128, 132, 43,134, 44 
1210 data 172, 228,128, 174,229, 128, 132, 95 
1220 data 134, 96, 172, 226, 128, 174, 227, 128 
1230 data 132, 88,134, 89,136,192,255,208 
1240 data 1,202,132, 45,134, 46,169,160 
1250 data 133, 91,169, 0,133, 90, 32,191 

1260 data 163, 169, 82,141,119, 2,169, 85 

1270 data 141, 120, 2,169, 78,141,121, 2 

1280 data 169, 13,141,122, 2,169, 4,133 

1290 data 198, 108, 2, 3, 56,165, 46,229 

1300 data 44,170,165, 45,229, 43,168,224 
1310 data 31,176, 67,140,228,128,142,229 
1320 data 128, 56, 169, 159, 237, 229, 128, 141 
1330 data 229, 128, 169, 255, 237, 228, 128, 141 
1340 data 228, 128, 165, 43, 141,224, 128,133 
1350 data 95,165, 44,141,225,128,133, 96 
1360 data 164, 45,166, 46,200,208, 1,232 

1370 data 140, 226, 128, 132, 90,142,227, 128 
1380 data 134, 91,169,160,133, 89,169, 0 

1390 data 133, 88, 32,191,163, 96,169,204 
1400 data 160,128, 32, 30,171, 96, 80, 82 

1410 data 79, 71, 82, 65, 77, 32, 84, 79 

1420 data 79, 32, 76, 65, 82, 71, 69, 10 

1430 data 13, 0, 0, 0, 0, 0, 0, 0 

Listato 2 

1000 rem save " Oiramcart.pal " ,8 

1010 rem ** by: john bush and noel nyman - seattle, wa 

1020 rem »» auto-start support prg for c64 ram cartridge 

1030: 

1040 open 8,8,1, " 0:ramcart " 

1050 sys 700 
1060 .opt 08 

1070* = $8000 


1080; 

1090 ;*** ec 
1100 ; 

1110 txttab 
1120 vartab 
1130 source 
1140 end 
1150 dest 
1160 ndx 


equates « 


;start of basic text 

;end of basic text 

;start of source to copy 

;end +1 of source to copy 

;end +1 of destinatìon 

;no of characters in keyboard 

buffer 

;start of keyboard buffer 
; basic warm start vector 
;copy memory 
;print string 
;vic control register 
;copy basic vectors to ram 
; initialize basic interpreter 
;initialize i/o 

;initialize memory pointers 
gestore i/o vectors 
;init screen and keyboard 
continue with nmi routine 


1170keyd = $0277 ; start of keyboard 

1180 warm = $0302 ; basic warm start \ 

1190 copy = $a3bf ;copy memory 

1200strout = $ab1e ;print string 

1210 vicctrl = $d016 ;vic control registe 

1220 vectors = $e453 ; copy basic vector 

1230 init = $e3bf ; initialize basic inti 

1240 ioinit = $fda3 ;initialize i/o 

1250ramtas = $fd50 ;initialize memory | 

1260restor = $fd15 gestore i/o vectors 

1270 cint = $ff5b ;init screen and ke 
1280nmicont= $fe5e continue with nmi 

1290; 

1300 ;*** auto-start basic program *** 

1310; 

1320 ; place start of code in cartridge vectors 

1330 byte <start,>start 

1340 byte <nmicont,>nmicont 

1350 ; ’cbm' with bit 7 set 

1360 byte $c3,$c2,$cd 

1370 asc "80" 

1380; 

1390 ;’start' calls most of thè routines 
1400 ;which would be executed if a cartridge 
1410 ;had not been detected. System vectors 
1420 ;and basic are initialized. 

1430; 

1440 start Idx #5 

1450 stx vicctrl 

1460 jsr ioinit 

1470 jsr ramtas 

1480 jsr restor 

1490 jsr cint 

1500 eli 

1510 jsr 

1520 jsr 

1530 Idx 

1540 txs 


1450 stx vicctrl 

1460 jsr ioinit 

1470 jsr ramtas 

1480 jsr restor 

1490 jsr cint 

1500 eli 

1510 jsr vectors 

1520 jsr init 

1530 Idx #$fb 

1540 txs ;initialize stack pointer 

1550; 

1560 ;copy thè basic program from 
1570 ;the area under $a000 to thè start-of-basic 
1580 ;and set up thè basic text and variables 
1590 ;vectors. place 'run' in thè keyboard buffer and 
1600 ;enter basic through thè warm start vector. 
1610; 

1620 Idy txtt ;store start of basic 

1630 Idx txtt-t-1 ;saved with program 








1640 

sty 

txttab 

;at op System vector 

2180 

sec 



1650 

stx 

txttab +1 


2190 

Ida 

#$9f 

;subtract size from $9fff to 

1660 

Idy 

stsour 

;store start of source 




find 

1670 

Idx 

stsour +1 

;at vector for copy routine 

2200 

sbc 

stsour +1 

;start of program in car- 

1680 

sty 

source 





tridge memory 

1690 

stx 

source +1 


2210 

sta 

stsour +1 


1700 

Idy 

vart 

;store end of destination 

2220 

Ida 

#$ff 





( + 1) 

2230 

sbc 

stsour 


1710 

Idx 

vart +1 

;at copy routine vector 

2240 

sta 

stsour 


1720 

sty 

dest 


2250 

Ida 

txttab 

;store start of basic for 

1730 

stx 

dest +1 





cartridge 

1740 

dey 


;subtract one from low byte 

2260 

sta 

txtt 

;use and in vector for copy 

1750 

cpy 

#$ff 





routine 

1760 

bne 

cont 


2270 

sta 

source 


1770 

dex 


;subtract borrow 

2280 

Ida 

txttab +1 


1780 cont 

sty 

vartab 

; store op System vector 

2290 

sta 

txtt +1 


1790 

stx 

vartab +1 


2300 

sta 

source +1 


1800 

Ida 

#$a0 

;end of source (+1) = 

2310 

Idy 

vartab 

;store end of basic ( +1 ) for 




$a000 




cartridge 

1810 

sta 

end +1 


2320 

Idx 

vartab +1 

;use and vector for copy 

1820 

Ida 

#0 





routine 

1830 

sta 

end 


2330 

iny 



1840 

jsr 

copy 


2340 

bne 

conti 


1850 

Ida 

# V 


2350 

inx 



1860 

sta 

keyd 


2360 conti sty 

vart 


1870 

Ida 

#" u" 


2370 

sty 

end 


1880 

sta 

keyd +1 


2380 

stx 

vart + 1 


1890 

Ida 

#" n" 


2390 

stx 

end +1 


1900 

sta 

keyd + 2 


2400 

Ida 

#$a0 

; store $a000 (end of car- 

1910 

Ida 

#$0d 

;<return> 




tridge memory +1) 

1920 

sta 

keyd + 3 


2410 

sta 

dest+1 

;in vector for read routine 

1930 

Ida 

#4 

;number of characters 

2420 

Ida 

#0 


1940 

sta 

ndx 


2430 

sta 

dest 


1950 

jmp 

(warm) 


2440 

jsr 

copy 


1960; 




2450 

rts 



1970 ;*** store basic program to cartridge *** 

2460; 




1980 ;calculate thè size of thè basic text, and 

2470 ;*•• 

print errar message * * * 

1990 ;print an errar message if too large to fit 

2480; 




2000 ; in thè cartridge. if okay, subtract thè size 

2490 errar 

Ida 

#<message 

2010 ;from $9fff to get thè location of thè start 

2500 

Idy 

#>message 

2020 ;of thè copy to be saved to cartridge. save 

2510 

jsr 

strout 


2030 ;that vector, and thè start and end of basic 

2520 

rts 



2040 ;text for future use. set 

-up vectors for 

2530; 




2050 ;copy routine and copy program to cartridge. 

2540 message 

* 


2060; 




2550 .asc 

" program too large “ 

2070 store 

sec 



2560 .byte $0a,$0d,$00 


2080 

Ida 

vartab +1 


2570; 




2090 

sbc 

txttab +1 

;find size of basic program 

2580 ;•*• 

System vector Storage *** 

2100 

tax 



2590; 




2110 

Ida 

vartab 


2600 txtt 

.word 0 

;start of program in ram 

2120 

sbc 

txttab 


2610 vart 

.word 0 

;end of program in ram 

2130 

tay 



2620 stsour.word 0 

;start of source in cartridge 

2140 

cpx 

#$1f 

;max size allowed 

2630; 




2150 

bcs 

errar 

;print errar message and 

2640 end 







quit 





2160 

sty 

stsour 

;store size temporarily 





2170 

stx 

stsour +1 
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